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STASTUB = Stand-alone DCL parsing stub routines bs ats tab 4 00:20:27 VAX/VMS Macro v04-00 Pa 1 
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COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS SOFTWARE IS gett UNDER A LICENSE AND MAY BE USED AND cor ite 
ONLY IN ACCORDANCE WITH THE TERMS OF SUCH bi CENse AND WITH 

INCLUSION OF THE ABOVE gill NOTICE. THIS SOFTWARE OR ANY O HER 
COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
eeRPORAT ion NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 
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Stand-alone DCL parsing stub routines 

Peter George 20-June-1983 

MODIFIED BY: 
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v04-000 46-SEP-1984 DCL.SRCISTASTUB.MAR; 1 
$3 
$8 § : Macro Library calls 
3009 8 ‘ SCLIMSGDEF : Define error/status codes 
nO" 9000 9 -PSECT DCLS$ZCODE,BYTE,RD,NOWRT 
$0 42 DCLSEXPRESS:: 3; Analyze expression 
44 4 STATUS INVROUT 3; Set status 
05 000 44 RSB 3; Return 
44 45 
008 46 END 
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CLIS_INVROUT = ats 94 
DCLSEXPRESS 0000000 RG 02 


foe ee me om ow ue ae ee oe we eo a me 


! Psect synopsis ! 


¢eereseesceanseaoeat$ 


PSECT name Al location PSECT No. Attributes 

» MS « 09 0000 : -» 00 ¢ 9} NOPIC “USR CON ABS LCL NOSHR NOEXE NORD NOWRT moves BYTE 
SABSS 444 “ 1 ¢ -) NOPIC USR CON ABS LCL NOSHR EXE RD WRT NOVEC BYTE 
DCLSZCODE ») NOPIC USR CON REL LCL NOSHR EXE RD NOWRT NOVEC BYTE 


dome cean nm sean swe aoe nr moneace + 


! ; Performance indicators ! 
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Phase Page faults CPU Time Elapsed Time 
initialization 10 00:00:00.04 00:00:0 -26 
pounene processing 83 Be Sh 4 00:00:07.44 
116 4 5-9 Bo 389 : 99-8? 
Synbol table sort 2 0:00:00.15 8 :00:00.$8 
s 2 1 0:00:00.31 BF OO Be: 3 
Suabot table output 1 00:00:00.01 00:00:00.01 
Psect synopsis output 1 00:00:00.02 eB S44 
Cross-reference output be Se Be 00:00:00.00 
Assembler run totals 226 00:00:03.16 00:00:22.91 


The working set Limit was 900 pages 

7684 bytes (16 pages) of virtual memory were used to buffer the intermediate code. 

There were 10 pages of symbol table space allocated to hold 154 non-local and 0 local symbols. 
46 source Lines were read in Pass 1, producing 13 object records in Pass 2. 

10 pages of virtual memory were used to define 9 macros. 


Macro Library name Macros defined 
5 2dSDUA28: Syst SB IEVSSLOM 8, MLB; 1 0 
S255SDUA itt L.M if 3 
$5833DUA 08) PTB: Mt g 
$538 $puAaB:Ceyel 18 STARLET. Sale; 32 
Terare (all libraries) 6 


223 GETS were required to define 6 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1IS$:STASTUB/OBJ=0BJ$:STASTUB MSRC$:STASTUB/UPDATE=(ENHS$: STASTUB) +EXECML$/LIB+LIB$:DCL/LIB+SYS$LIBRARY:SYSBLOMLB/LIB 


ds 
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